home *** CD-ROM | disk | FTP | other *** search
/ Winzipper / Winzipper_ISO.iso / nt4.0 server / SUBROUTN.IN_ / subroutn.inf
INI File  |  1996-07-12  |  12KB  |  342 lines
  1. [SetupMessage]
  2.     set Status     = STATUS_FAILED
  3.     set UserAction = "CANCEL"
  4.     set LanguageList = ^(LanguageID, 1)
  5.     Ifcontains(i) $($0) in $(LanguageList)
  6.         goto displaymessage
  7.     else
  8.         set Status = STATUS_NOLANGUAGE
  9.         goto finish_SetupMessage
  10.     endif
  11. displaymessage = +
  12.     set DlgText = $($2)
  13.     ifstr(i) $($1) == "WARNING"
  14.         read-syms WarningDlg$($0)
  15.     else-ifstr(i) $($1) == "FATAL"
  16.         read-syms FatalDlg$($0)
  17.     else-ifstr(i) $($1) == "NONFATAL"
  18.         read-syms NonfatalDlg$($0)
  19.     else-ifstr(i) $($1) == "STATUS"
  20.         read-syms StatusDlg$($0)
  21.     else
  22.         goto finish_SetupMessage
  23.     endif
  24.     ui start "SetupMessage"
  25.     ifstr(i) $(DLGEVENT) == "OK"
  26.         set Status     = STATUS_SUCCESSFUL
  27.         set UserAction = $(DLGEVENT)
  28.     else-ifstr(i) $(DLGEVENT) == "CANCEL"
  29.         set Status     = STATUS_SUCCESSFUL
  30.         set UserAction = $(DLGEVENT)
  31.     else
  32.     endif
  33. finish_SetupMessage = +
  34.     Return $(Status) $(UserAction)
  35.     end
  36. [QueryUserQuit]
  37.     set Status     = STATUS_FAILED
  38.     set UserAction = CANCEL
  39.     set LanguageList = ^(LanguageID, 1)
  40.     Ifcontains(i) $($0) in $(LanguageList)
  41.     else
  42.         set Status = STATUS_NOLANGUAGE
  43.         goto fin_QueryUserQuit
  44.     endif
  45.     read-syms ExitWarningDlg$($0)
  46.     ui start "ExitWarning"
  47.     ifstr(i) $(DLGEVENT) == "YES"
  48.         set Status     = STATUS_SUCCESSFUL
  49.         set UserAction = "OK"
  50.     else-ifstr(i) $(DLGEVENT) == "NO"
  51.         set Status     = STATUS_SUCCESSFUL
  52.         set UserAction = "CANCEL"
  53.     else
  54.     endif
  55. fin_QueryUserQuit = +
  56.     Return $(Status) $(UserAction)
  57. [PushBillboard]
  58.     ifstr(i) $(!NTN_NOTIFY_HWND) == ""
  59.         read-syms BillboardDlg$(!STF_LANGUAGE)
  60.         ui start "Billboard"
  61.     endif
  62.     Return
  63. [PopBillboard]
  64.     ifstr(i) $(!NTN_NOTIFY_HWND) == ""
  65.         ui pop 1
  66.     endif
  67.     Return
  68. [AllocateUnusedDrive]
  69.     set Status = STATUS_FAILED
  70.     set Drive  = ""
  71.     ifstr(i) $(!STF_UNUSEDDRIVES) == {}
  72.         goto finish_allocate
  73.     else-ifstr(i) $(!STF_UNUSEDDRIVES) == ""
  74.         goto finish_allocate
  75.     else
  76.         set NewDriveList = {}
  77.         ForListDo $(!STF_UNUSEDDRIVES)
  78.             ifstr(i) $(#) != 1
  79.                 set NewDriveList = >($(NewDriveList), $($))
  80.             else
  81.                 set Drive  = $($)
  82.                 set Status = STATUS_SUCCESSFUL
  83.             endif
  84.         EndForListDo
  85.         set !STF_UNUSEDDRIVES = $(NewDriveList)
  86.     endif
  87. finish_allocate = +
  88.     Return $(Status) $(Drive)
  89. [FreeUnusedDrive]
  90.     set !STF_UNUSEDDRIVES = >($(!STF_UNUSEDDRIVES), $($0))
  91.     Return
  92. [DriversExist]
  93.     set Status = STATUS_FAILED
  94.     set LanguageList = ^(LanguageID, 1)
  95.     Ifcontains(i) $($0) in $(LanguageList)
  96.     else
  97.         set Status = STATUS_NOLANGUAGE
  98.         goto finish_DriversExist
  99.     endif
  100.     read-syms DriversExistDlg$($0)
  101.     ui start "DriversExist"
  102.     ifstr(i) $(DLGEVENT) == "DLGBUTTON0"
  103.         set Status = STATUS_CURRENT
  104.     else-ifstr(i) $(DLGEVENT) == "DLGBUTTON1"
  105.         set Status = STATUS_NEW
  106.     else-ifstr(i) $(DLGEVENT) == "BACK"
  107.         set Status = STATUS_USERCANCEL
  108.     endif
  109.     ui pop 1
  110. finish_DriversExist = +
  111.     Return $(Status)
  112. [DoAskSource]
  113.     read-syms DoAskSourceDlgText$(!STF_LANGUAGE)
  114.     shell "" DoAskSourceEx $($0) $(DlgText)
  115.     Return $($R0) $($R1) $($R2) $($R3)
  116. [DoAskSourceEx]
  117.     set Status      = STATUS_FAILED
  118.     set Src         = $($0)
  119.     set DriveToFree = ""
  120.     read-syms  AskSourceStrings$(!STF_LANGUAGE)
  121. asksource = +
  122.     read-syms DisketteDlg$(!STF_LANGUAGE)
  123.     ui start "Diskette"
  124.     ifstr(i) $(DLGEVENT) == "CONTINUE"
  125.         LibraryProcedure IsFullPath, $(!LIBHANDLE), CheckPathFullPathSpec $(EditTextOut)
  126.         ifstr(i) $(IsFullPath) == "NO"
  127.             StartWait
  128.             LibraryProcedure STATUS, $(!LIBHANDLE), ProcessForUNC $(EditTextOut)
  129.             EndWait
  130.             ifstr(i) $(STATUS) == "ERROR"
  131.                 shell "" SetupMessage $(!STF_LANGUAGE) "NONFATAL" $(String1)
  132.                 goto asksource
  133.             else-ifstr(i) $(STATUS) == "NOT-UNC"
  134.                 shell "" SetupMessage $(!STF_LANGUAGE) "NONFATAL" $(String2)
  135.                 goto asksource
  136.             else-ifstr(i) $(STATUS) == "UNC-FAILCONNECT"
  137.                 shell "" SetupMessage $(!STF_LANGUAGE) "NONFATAL" $(String4)
  138.                 goto asksource
  139.             else
  140.                 set Src = $(STATUS)
  141.             endif
  142.         else
  143.             set Src = $(EditTextOut)
  144.         endif
  145.         ui pop 1
  146.         LibraryProcedure STATUS, $(!LIBHANDLE), AppendBackSlash $(Src)
  147.         ifstr(i) $(STATUS) == "ERROR"
  148.             goto finish_DoAskSource
  149.         else
  150.             set Src = $(STATUS)
  151.             set Status = STATUS_SUCCESSFUL
  152.             goto finish_DoAskSource
  153.         endif
  154.     else-ifstr(i) $(DLGEVENT) == "BACK"
  155.         ui pop 1
  156.         set Status = STATUS_USERCANCEL
  157.         goto finish_DoAskSource
  158.     else
  159.         ui pop 1
  160.         goto finish_DoAskSource
  161.     endif
  162. finish_DoAskSource = +
  163.     Return $(Status) $(Src) $(DriveToFree) $(EditTextOut)
  164. [SetupHelpIds]
  165.     !MinimumID                 =    0
  166.     !MaximumID                 = 5000
  167.     !InitialContentsID         = 5
  168.     !IDH_DB_COMPUTERNAMEQ_INS  =   10
  169.     !IDH_DB_COMPUTERNAMEV_INS  =   11
  170.     !IDH_DB_FULLNAMEQ_INS      =   30
  171.     !IDH_DB_FULLNAMEV_INS      =   31
  172.     !IDH_DB_ORGNAMEQ_INS       =   32
  173.     !IDH_DB_ORGNAMEV_INS       =   33
  174.     !IDH_DB_PRODUCTIDQ_INS     =   40
  175.     !IDH_DB_PRODUCTIDV_INS     =   41
  176.     !IDH_DB_INSTALLMODE_INS    =   50
  177.     !IDH_DB_OPTIONS_INS        =   60
  178.     !IDH_DB_SYSTEM_INS         =   70
  179.     !IDH_DB_VIRTUAL_INS        =   80
  180.     !IDH_DB_REPAIR_INS         =   90
  181.     !IDH_DB_PRNSETUP_INS       =  100
  182.     !IDH_DB_OPTIONAL_INS       =  110
  183.     !IDH_DB_CUSTOMISE_INS      =  111
  184.     !IDH_DB_OEMSINGLESEL_INS   =  120
  185.     !IDH_DB_OEMMULTISEL_INS    =  121
  186.     !IDH_DB_ACCOUNTSETUP_INS   =  130
  187.     !IDH_DB_ACCOUNTADMN_INS    =  131
  188.     !IDH_DB_SEARCHDRIVE_INS    =  150
  189.     !IDH_DB_APPCONFLICT_INS    =  151
  190.     !IDH_DB_ASTYPE_INS      =  160
  191.     !IDH_DB_MAINTAIN_INS            = 1000
  192.     !IDH_DB_MOPTIONAL_INS           = 1010
  193.     !IDH_DB_MCUSTOMISE_INS          = 1011
  194.     !IDH_DB_MSYSTEM_INS             = 1020
  195.     !IDH_DB_MPROFILE_INS            = 1030
  196.     !IDH_DB_SCSI_DRIVER_INS         = 1040
  197.     !IDH_DB_SCSI_SELECTDRIVER_INS   = 1041
  198.     !IDH_DB_DRIVEREXIST_INS         = 1042
  199.     !IDH_DB_TAPE_DRIVER_INS         = 1043
  200.     !IDH_DB_TAPE_SELECTDRIVER_INS   = 1044
  201.     !IDH_DB_CARDSELECTION_INS   = 3000  
  202.     !IDH_DB_SOFTSELECTION_INS   = 3001  
  203.     !IDH_DB_OEMNADD1_INS        = 3500  
  204.     !IDH_DB_OEMNADD2_INS        = 3510  
  205.     !IDH_DB_OEMNADDE_INS        = 3520  
  206.     !IDH_UB_OEMNADDP_INS        = 3521  
  207.     !IDH_DB_OEMNADE1_INS        = 3530  
  208.     !IDH_DB_OEMNADE2_INS        = 3540  
  209.     !IDH_DB_OEMNADE3_INS        = 3545  
  210.     !IDH_DB_OEMNADLB_INS        = 3546  
  211.     !IDH_DB_OEMNADAM_INS        = 3547  
  212.     !IDH_DB_OEMNADEM_INS        = 3550  
  213.     !IDH_DB_OEMNADN2_INS        = 3551  
  214.     !IDH_DB_OEMNADN1_INS        = 3552  
  215.     !IDH_DB_OEMNADNE_INS        = 3560  
  216.     !IDH_DB_OEMNADIN_INS        = 3561  
  217.     !IDH_DB_OEMNADEP_INS        = 3565  
  218.     !IDH_DB_OEMNADP3_INS        = 3570  
  219.     !IDH_DB_OEMNADP9_INS        = 3580  
  220.     !IDH_DB_OEMNADSO_INS        = 3590  
  221.     !IDH_DB_OEMNADTK_INS        = 3600  
  222.     !IDH_DB_OEMNADT2_INS        = 3601  
  223.     !IDH_DB_OEMNADTE_INS        = 3602  
  224.     !IDH_DB_OEMNADTM_INS        = 3605  
  225.     !IDH_DB_OEMNADUB_INS        = 3610  
  226.     !IDH_DB_OEMNADWD_INS        = 3620  
  227.     !IDH_DB_OEMNADWM_INS        = 3630  
  228.     !IDH_DB_OEMNADAR1_INS       = 3631  
  229.     !IDH_DB_OEMNADAR2_INS       = 3632  
  230.     !IDH_DB_OEMNADAR3_INS       = 3633  
  231.     !IDH_DB_OEMNADNF_INS        = 3634  
  232.     !IDH_DB_OEMNSVNB_INS        = 3640  
  233.     !IDH_DB_OEMNSVRD_INS        = 3650  
  234.     !IDH_DB_OEMNSVRE_INS        = 3660  
  235.     !IDH_DB_OEMNSVSV_INS        = 3670  
  236.     !IDH_DB_OEMNSVWK_INS        = 3680  
  237.     !IDH_DB_OEMNXPDL_INS        = 3690  
  238.     !IDH_DB_OEMNXPNB_INS        = 3700  
  239.     !IDH_DB_OEMNXPSN_INS        = 3710  
  240.     !IDH_DB_OEMNXPSN_1          = 3711  
  241.     !IDH_DB_OEMNXPSN_2          = 3712  
  242.     !IDH_DB_OEMNXPTC_INS        = 3720  
  243.     !IDH_DB_OEMNXPTC_1          = 3721  
  244.     !IDH_DB_OEMNXPTC_2          = 3722  
  245.     !IDH_DB_OEMNXPTC_3          = 3723  
  246.     !IDH_DB_LMHOST_INS          = 3730  
  247.     !IDH_DB_RPCLOCATE_INS       = 3740  
  248.     !IDH_DB_OEMNSVRI_INS        = 3745  
  249.     !IDH_DB_RETURN_TO_NCPA      = 3750  
  250.     !IDH_DB_GET_PROTOCOL        = 4000  
  251.     !IDH_DB_VER_EXISTED         = 4010  
  252.     !IDH_DB_DETECT_BYPASS       = 4020  
  253.     !IDH_DB_DETECT_FOUND        = 4030  
  254.     !IDH_DB_DETECT_FAILED       = 4040  
  255.     !IDH_DB_DETECT_CHKRAS       = 4050  
  256.     !IDH_DB_OEMNADLT_INS            = 4060  
  257. [ReadSetupHelpIds]
  258.     read-syms "SetupHelpIds"
  259.     Return
  260. [GetDefaultAnswer]
  261.     ifstr(i) $(!STF_GUI_UNATTENDED) == "YES"
  262.         shell $(!STF_UNATTENDED) ReadDefaultData $($0)
  263.     endif
  264.     Return
  265. [LanguageID]
  266.     ENG
  267. [WarningDlgENG]
  268.     STF_MB_TITLE = "Setup Message"
  269.     DlgType      = "MessageBox"
  270.     STF_MB_TEXT  = $(DlgText)
  271.     STF_MB_TYPE  = 2
  272.     STF_MB_ICON  = 5
  273.     STF_MB_DEF   = 2
  274. [FatalDlgENG]
  275.     STF_MB_TITLE = "Setup Message"
  276.     DlgType      = "MessageBox"
  277.     STF_MB_TEXT  = $(DlgText)
  278.     STF_MB_TYPE  = 1
  279.     STF_MB_ICON  = 3
  280.     STF_MB_DEF   = 1
  281. [NonfatalDlgENG]
  282.     STF_MB_TITLE = "Setup Message"
  283.     DlgType      = "MessageBox"
  284.     STF_MB_TEXT  = $(DlgText)
  285.     STF_MB_TYPE  = 1
  286.     STF_MB_ICON  = 5
  287.     STF_MB_DEF   = 1
  288. [StatusDlgENG]
  289.     STF_MB_TITLE = "Setup Message"
  290.     DlgType      = "MessageBox"
  291.     STF_MB_TEXT  = $(DlgText)
  292.     STF_MB_TYPE  = 1
  293.     STF_MB_ICON  = 2
  294.     STF_MB_DEF   = 1
  295. [ExitWarningDlgENG]
  296.     STF_MB_TITLE = "Exit Windows NT Setup"
  297.     STF_MB_TEXT  = "Windows NT is not correctly installed.  Are you "+
  298.                    "sure you want to exit Setup?"
  299.     DlgType      = "MessageBox"
  300.     STF_MB_TYPE  = 3
  301.     STF_MB_ICON  = 5
  302.     STF_MB_DEF   = 2
  303. [BillboardDlgENG]
  304.     DlgType     = Billboard
  305.     DlgTemplate = $($0)
  306.     TextFields  = {$($1)}
  307. [DriversExistDlgENG]
  308.     Caption      = "Windows NT Setup"
  309.     DlgText      = "The driver(s) for this "$($1)" are already on the system. "+
  310.                    "Do you want to use the currently installed driver(s) or "+
  311.                    "install new one(s)."
  312.     Current      = "Cu&rrent"
  313.     New          = "&New"
  314.     Cancel       = "Cancel"
  315.     Help         = "&Help"
  316.     DlgType      = "Info"
  317.     DlgTemplate  = "DRIVEREXISTS"
  318.     HelpContext  = $(!IDH_DB_DRIVEREXIST_INS)
  319. [DoAskSourceDlgTextENG]
  320.     DlgText = "Setup needs to copy some Windows NT files."$(!LF)$(!LF)+
  321.               "Setup will look for the files in the location specified below. If you want "+
  322.               "Setup to look in a different place, type the new location. When the location "+
  323.               "is correct, click Continue."
  324. [AskSourceStringsENG]
  325. String1 = "Error processing path entered.  Please reenter the path."
  326. String2 = "Setup requires a full path of the Windows NT distribution files.  "+
  327.           "Please reenter the path."
  328. String3 = "Setup failed to find a free drive to use to connect to the "+
  329.           "server specified.  Please free up some drives and try again."
  330. String4 = "Setup failed to connect to the server specified.  Please reenter "+
  331.           "the path."
  332. [DisketteDlgENG]
  333.     Caption        = "Windows NT Setup"
  334.     Continue       = "Continue"
  335.     Cancel         = "Cancel"
  336.     DlgType        = "Edit"
  337.     DlgTemplate    = "DISKETTE"
  338.     DlgText        = $($1)
  339.     Edit1Label     = ""
  340.     EditTextIn     = $(Src)
  341.     EditFocus      = "ALL"
  342.